::根据输入dll名字，自动查找并复制到该目录下dll存放文件夹中

@echo off
set dll_path=dll_%date:~5,10%
set temp=%dll_path%\temp.txt
md .\%dll_path% 2>nul
echo 应用：复制dll文件到%dll_path%目录下
:add_start
set /p dll_name=输入dll文件名(eg. gflags.dll),q to quit:
if %dll_name%==q ( goto add_end)
where %dll_name% 2>nul 1>%temp%
if errorlevel 1 ( echo 未找到%dll_name%，请重新输入
goto add_start )else ( echo 找到%dll_name% 于
type %temp% )
 
copy %dll_name% %dll_path% -on
 
set /p flag=继续复制dll文件(y or n)?
if %flag%==y ( goto add_start )else ( echo 再见)
del .\%temp%
 
:add_end
pause
